home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1997 September / Macworld (1997-09).dmg / Shareware World / Utilities / Text Processing / Alpha / Tcl / ElectricAlias / Aliases / aliases.Text < prev    next >
Text File  |  1994-06-18  |  1KB  |  28 lines

  1. # FILE: aliases.Text
  2. #
  3. # DESC: Aliases for typing aids
  4. #
  5. # LAST UPDATE: 01/06/93 4:56:47 AM 
  6.  
  7.     electricAlias-def •Text •Text •Text
  8.  
  9.     electricAlias-def •Text "•memo" "SUBJ: •\rDATE: §«date»
  10.     \b    \bTO:   •\rFROM: §{author}\r\r•"
  11.     electricAlias-def •Text "•haddr" "§{author}\r§{haddr}\r§{hcity}"
  12.     electricAlias-def •Text "•letter" "
  13.     \b    \b§«sprintf %55s {}»§{author}\r§«format %55s {}»§{haddr}
  14.     \b    \b§«format %55s {}»§{hcity}\r§«sprintf %55s {}»§«date»\r•\r
  15.     \b    \bDear •,\r\r•\r
  16.     \b    \bSincerely,\r\r§{author}
  17.     \b    \b"
  18.     # use the following to number a list of items
  19.     electricAlias-def •Text •i  "§«set item 1; number \$item i»."
  20.     electricAlias-def •Text •ii "§«incr item; number \$item i». "
  21.     electricAlias-def •Text •I  "§«set item 1; number \$item I»."
  22.     electricAlias-def •Text •II "§«incr item; number \$item I». "
  23.      electricAlias-def •Text •a  "§«set item 1; number \$item a»."
  24.     electricAlias-def •Text •aa "§«incr item; number \$item a». "
  25.      electricAlias-def •Text •A  "§«set item 1; number \$item A»."
  26.     electricAlias-def •Text •AA "§«incr item; number \$item A». "
  27.  
  28.